home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Programming / SecalDemo / Inc / libcalls / commodities.inc < prev    next >
Encoding:
Text File  |  1997-06-11  |  4.6 KB  |  237 lines
  1. pattern CreateCxObj(_type,_arg1,_arg2) is
  2.     push a6;
  3.     safe d0.l:=_type; a0:=_arg1; a1:=_arg2;;
  4.     a6:=CxBase; jsr [a6-30];
  5.     pop a6;
  6. endp;                                                            # CREATECXOBJ
  7.  
  8. pattern CxBroker(_nb,_error) is
  9.     push a6;
  10.     safe a0:=_nb; d0.l:=_error;;
  11.     a6:=CxBase; jsr [a6-36];
  12.     pop a6;
  13. endp;                                                            # CXBROKER
  14.  
  15. pattern ActivateCxObj(_co,_true) is
  16.     push a6;
  17.     safe a0:=_co; d0.l:=_true;;
  18.     a6:=CxBase; jsr [a6-42];
  19.     pop a6;
  20. endp;                                                            # ACTIVATECXOBJ
  21.  
  22. pattern DeleteCxObj(_co) is
  23.     push a6;
  24.     a0:=_co;
  25.     a6:=CxBase; jsr [a6-48];
  26.     pop a6;
  27. endp;                                                            # DELETECXOBJ
  28.  
  29. pattern DeleteCxObjAll(_co) is
  30.     push a6;
  31.     a0:=_co;
  32.     a6:=CxBase; jsr [a6-54];
  33.     pop a6;
  34. endp;                                                            # DELETECXOBJALL
  35.  
  36. pattern CxObjType(_co) is
  37.     push a6;
  38.     a0:=_co;
  39.     a6:=CxBase; jsr [a6-60];
  40.     pop a6;
  41. endp;                                                            # CXOBJTYPE
  42.  
  43. pattern CxObjError(_co) is
  44.     push a6;
  45.     a0:=_co;
  46.     a6:=CxBase; jsr [a6-66];
  47.     pop a6;
  48. endp;                                                            # CXOBJERROR
  49.  
  50. pattern ClearCxObjError(_co) is
  51.     push a6;
  52.     a0:=_co;
  53.     a6:=CxBase; jsr [a6-72];
  54.     pop a6;
  55. endp;                                                            # CLEARCXOBJERROR
  56.  
  57. pattern SetCxObjPri(_co,_pri) is
  58.     push a6;
  59.     safe a0:=_co; d0.l:=_pri;;
  60.     a6:=CxBase; jsr [a6-78];
  61.     pop a6;
  62. endp;                                                            # SETCXOBJPRI
  63.  
  64. pattern AttachCxObj(_headObj,_co) is
  65.     push a6;
  66.     safe a0:=_headObj; a1:=_co;;
  67.     a6:=CxBase; jsr [a6-84];
  68.     pop a6;
  69. endp;                                                            # ATTACHCXOBJ
  70.  
  71. pattern EnqueueCxObj(_headObj,_co) is
  72.     push a6;
  73.     safe a0:=_headObj; a1:=_co;;
  74.     a6:=CxBase; jsr [a6-90];
  75.     pop a6;
  76. endp;                                                            # ENQUEUECXOBJ
  77.  
  78. pattern InsertCxObj(_headObj,_co,_pred) is
  79.     push a2\a6;
  80.     safe a0:=_headObj; a1:=_co; a2:=_pred;;
  81.     a6:=CxBase; jsr [a6-96];
  82.     pop a2\a6;
  83. endp;                                                            # INSERTCXOBJ
  84.  
  85. pattern RemoveCxObj(_co) is
  86.     push a6;
  87.     a0:=_co;
  88.     a6:=CxBase; jsr [a6-102];
  89.     pop a6;
  90. endp;                                                            # REMOVECXOBJ
  91.  
  92. pattern commoditiesPrivate1 is
  93.     push a6;
  94.     a6:=CxBase; jsr [a6-108];
  95.     pop a6;
  96. endp;                                                            # COMMODITIESPRIVATE1
  97.  
  98. pattern SetTranslate(_translator,_events) is
  99.     push a6;
  100.     safe a0:=_translator; a1:=_events;;
  101.     a6:=CxBase; jsr [a6-114];
  102.     pop a6;
  103. endp;                                                            # SETTRANSLATE
  104.  
  105. pattern SetFilter(_filter,_text) is
  106.     push a6;
  107.     safe a0:=_filter; a1:=_text;;
  108.     a6:=CxBase; jsr [a6-120];
  109.     pop a6;
  110. endp;                                                            # SETFILTER
  111.  
  112. pattern SetFilterIX(_filter,_ix) is
  113.     push a6;
  114.     safe a0:=_filter; a1:=_ix;;
  115.     a6:=CxBase; jsr [a6-126];
  116.     pop a6;
  117. endp;                                                            # SETFILTERIX
  118.  
  119. pattern ParseIX(_description,_ix) is
  120.     push a6;
  121.     safe a0:=_description; a1:=_ix;;
  122.     a6:=CxBase; jsr [a6-132];
  123.     pop a6;
  124. endp;                                                            # PARSEIX
  125.  
  126. pattern CxMsgType(_cxm) is
  127.     push a6;
  128.     a0:=_cxm;
  129.     a6:=CxBase; jsr [a6-138];
  130.     pop a6;
  131. endp;                                                            # CXMSGTYPE
  132.  
  133. pattern CxMsgData(_cxm) is
  134.     push a6;
  135.     a0:=_cxm;
  136.     a6:=CxBase; jsr [a6-144];
  137.     pop a6;
  138. endp;                                                            # CXMSGDATA
  139.  
  140. pattern CxMsgID(_cxm) is
  141.     push a6;
  142.     a0:=_cxm;
  143.     a6:=CxBase; jsr [a6-150];
  144.     pop a6;
  145. endp;                                                            # CXMSGID
  146.  
  147. pattern DivertCxMsg(_cxm,_headObj,_returnObj) is
  148.     push a2\a6;
  149.     safe a0:=_cxm; a1:=_headObj; a2:=_returnObj;;
  150.     a6:=CxBase; jsr [a6-156];
  151.     pop a2\a6;
  152. endp;                                                            # DIVERTCXMSG
  153.  
  154. pattern RouteCxMsg(_cxm,_co) is
  155.     push a6;
  156.     safe a0:=_cxm; a1:=_co;;
  157.     a6:=CxBase; jsr [a6-162];
  158.     pop a6;
  159. endp;                                                            # ROUTECXMSG
  160.  
  161. pattern DisposeCxMsg(_cxm) is
  162.     push a6;
  163.     a0:=_cxm;
  164.     a6:=CxBase; jsr [a6-168];
  165.     pop a6;
  166. endp;                                                            # DISPOSECXMSG
  167.  
  168. pattern InvertKeyMap(_ansiCode,_event,_km) is
  169.     push a6;
  170.     safe d0.l:=_ansiCode; a0:=_event; a1:=_km;;
  171.     a6:=CxBase; jsr [a6-174];
  172.     pop a6;
  173. endp;                                                            # INVERTKEYMAP
  174.  
  175. pattern AddIEvents(_events) is
  176.     push a6;
  177.     a0:=_events;
  178.     a6:=CxBase; jsr [a6-180];
  179.     pop a6;
  180. endp;                                                            # ADDIEVENTS
  181.  
  182. pattern commoditiesPrivate2 is
  183.     push a6;
  184.     a6:=CxBase; jsr [a6-186];
  185.     pop a6;
  186. endp;                                                            # COMMODITIESPRIVATE2
  187.  
  188. pattern commoditiesPrivate3 is
  189.     push a6;
  190.     a6:=CxBase; jsr [a6-192];
  191.     pop a6;
  192. endp;                                                            # COMMODITIESPRIVATE3
  193.  
  194. pattern commoditiesPrivate4 is
  195.     push a6;
  196.     a6:=CxBase; jsr [a6-198];
  197.     pop a6;
  198. endp;                                                            # COMMODITIESPRIVATE4
  199.  
  200. pattern MatchIX(_event,_ix) is
  201.     push a6;
  202.     safe a0:=_event; a1:=_ix;;
  203.     a6:=CxBase; jsr [a6-204];
  204.     pop a6;
  205. endp;                                                            # MATCHIX
  206.  
  207. pattern commoditiesPrivate5 is
  208.     push a6;
  209.     a6:=CxBase; jsr [a6-210];
  210.     pop a6;
  211. endp;                                                            # COMMODITIESPRIVATE5
  212.  
  213. pattern commoditiesPrivate6 is
  214.     push a6;
  215.     a6:=CxBase; jsr [a6-216];
  216.     pop a6;
  217. endp;                                                            # COMMODITIESPRIVATE6
  218.  
  219. pattern commoditiesPrivate7 is
  220.     push a6;
  221.     a6:=CxBase; jsr [a6-222];
  222.     pop a6;
  223. endp;                                                            # COMMODITIESPRIVATE7
  224.  
  225. pattern commoditiesPrivate8 is
  226.     push a6;
  227.     a6:=CxBase; jsr [a6-228];
  228.     pop a6;
  229. endp;                                                            # COMMODITIESPRIVATE8
  230.  
  231. pattern commoditiesPrivate9 is
  232.     push a6;
  233.     a6:=CxBase; jsr [a6-234];
  234.     pop a6;
  235. endp;                                                            # COMMODITIESPRIVATE9
  236.  
  237.